package com.ruoyi.system.service.impl;

import java.util.ArrayList;
import java.util.Date;
import java.util.Iterator;
import java.util.List;
import java.util.stream.Collectors;

import com.ruoyi.common.constant.Constants;
import com.ruoyi.common.core.domain.entity.SysBatchDept;
import com.ruoyi.common.utils.CommUtils;
import com.ruoyi.common.utils.SecurityUtils;
import com.ruoyi.common.core.domain.SysHouse;
import com.ruoyi.system.mapper.SysHouseMapper;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.stereotype.Service;
import com.ruoyi.common.annotation.DataScope;
import com.ruoyi.common.constant.UserConstants;
import com.ruoyi.common.core.domain.TreeSelect;
import com.ruoyi.common.core.domain.entity.SysDept;
import com.ruoyi.common.core.domain.entity.SysRole;
import com.ruoyi.common.exception.CustomException;
import com.ruoyi.common.utils.StringUtils;
import com.ruoyi.system.mapper.SysDeptMapper;
import com.ruoyi.system.mapper.SysRoleMapper;
import com.ruoyi.system.service.ISysDeptService;
import org.springframework.transaction.annotation.Transactional;

/**
 * 部门管理 服务实现
 * 
 * @author ruoyi
 */
@Service
public class SysDeptServiceImpl implements ISysDeptService
{
    @Autowired
    private SysDeptMapper deptMapper;

    @Autowired
    private SysRoleMapper roleMapper;

    @Autowired
    private SysHouseMapper houseMapper;

    /**
     * 查询部门管理数据
     * 
     * @param dept 部门信息
     * @return 部门信息集合
     */
    @Override
    public List<SysDept> selectDeptList(SysDept dept)
    {
        return deptMapper.selectDeptList(dept);
    }

    /**
     * 查找社区内所有房间（不包括 uid 已经添加过得）
     * @param cId
     * @return
     */
    public List<SysDept> listByCid(Integer cId) {
        Long uId = SecurityUtils.getUserID();
        // 根据 uid 和 cid 查询数据库
        // 查找社区内所有房间（不包括 uid 已经添加过得）
        return deptMapper.selectByCidWithoutUid(cId, uId);
    }

    /**
     * 构建前端所需要树结构
     * 
     * @param depts 部门列表
     * @return 树结构列表
     */
    @Override
    public List<SysDept> buildDeptTree(List<SysDept> depts)
    {
        List<SysDept> returnList = new ArrayList<SysDept>();
        List<Long> tempList = new ArrayList<Long>();
        for (SysDept dept : depts)
        {
            tempList.add(dept.getDeptId());
        }
        for (Iterator<SysDept> iterator = depts.iterator(); iterator.hasNext();)
        {
            SysDept dept = (SysDept) iterator.next();
            // 如果是顶级节点, 遍历该父节点的所有子节点
            if (!tempList.contains(dept.getParentId()))
            {
                recursionFn(depts, dept);
                returnList.add(dept);
            }
        }
        if (returnList.isEmpty())
        {
            returnList = depts;
        }
        return returnList;
    }


    /**
     * 构建前端所需要下拉树结构
     * 
     * @param depts 部门列表
     * @return 下拉树结构列表
     */
    @Override
    public List<TreeSelect> buildDeptTreeSelect(List<SysDept> depts)
    {
        List<SysDept> deptTrees = buildDeptTree(depts);
        return deptTrees.stream().map(TreeSelect::new).collect(Collectors.toList());
    }

    /**
     * 根据角色ID查询部门树信息
     * 
     * @param roleId 角色ID
     * @return 选中部门列表
     */
    @Override
    public List<Integer> selectDeptListByRoleId(Long roleId)
    {
        SysRole role = roleMapper.selectRoleById(roleId);
        return deptMapper.selectDeptListByRoleId(roleId, role.isDeptCheckStrictly());
    }

    /**
     * 根据部门ID查询信息
     * 
     * @param deptId 部门ID
     * @return 部门信息
     */
    @Override
    public SysDept selectDeptById(Long deptId)
    {
        return deptMapper.selectDeptById(deptId);
    }

    /**
     * 根据ID查询所有子部门（正常状态）
     * 
     * @param deptId 部门ID
     * @return 子部门数
     */
    @Override
    public int selectNormalChildrenDeptById(Long deptId)
    {
        return deptMapper.selectNormalChildrenDeptById(deptId);
    }

    /**
     * 是否存在子节点
     * 
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public boolean hasChildByDeptId(Long deptId)
    {
        int result = deptMapper.hasChildByDeptId(deptId);
        return result > 0 ? true : false;
    }

    /**
     * 查询部门是否存在用户
     * 
     * @param deptId 部门ID
     * @return 结果 true 存在 false 不存在
     */
    @Override
    public boolean checkDeptExistUser(Long deptId)
    {
        int result = deptMapper.checkDeptExistUser(deptId);
        return result > 0 ? true : false;
    }

    /**
     * 校验部门名称是否唯一
     * 
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public String checkDeptNameUnique(SysDept dept)
    {
        Long deptId = StringUtils.isNull(dept.getDeptId()) ? -1L : dept.getDeptId();
        SysDept info = deptMapper.checkDeptNameUnique(dept.getDeptName(), dept.getParentId());
        if (StringUtils.isNotNull(info) && info.getDeptId().longValue() != deptId.longValue())
        {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 新增保存部门信息
     * 
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    @Transactional
    public int insertDept(SysDept dept)
    {
        SysDept info = deptMapper.selectDeptById(dept.getParentId());
        // 如果父节点不为正常状态,则不允许新增子节点
        if (!UserConstants.DEPT_NORMAL.equals(info.getStatus()))
        {
            throw new CustomException("部门停用，不允许新增");
        }
        // 添加属性
        dept.setCreateBy(SecurityUtils.getUsername());
        dept.setCommunityId(SecurityUtils.getCommunityId());

        dept.setAncestors(info.getAncestors() + "," + dept.getParentId());
        // 若父节点也是住址类型，则拼接 name 例如：一栋下的一单元 --> 一栋一单元
        if (UserConstants.DEPT_ADDR.equals(info.getType()) || UserConstants.DEPT_HOUSE.equals(info.getType())) {
            // 若添加的是房间号则中间加 “ - ”
            if (UserConstants.DEPT_HOUSE.equals(dept.getType())) {
                dept.setDeptName(info.getDeptName() + "-" + dept.getDeptName());
            } else {
                dept.setDeptName(info.getDeptName() + dept.getDeptName());
            }
        }

        // 若该节点是房间节点则添加一个房间
        if ( UserConstants.DEPT_HOUSE.equals(dept.getType())) {
            // 先添加部门
            deptMapper.insertDept(dept);
            SysHouse house = dept.getSysHouse();
            if (house == null) {
                SysHouse tmpHouse = new SysHouse();
                tmpHouse.setName(dept.getDeptName());
                tmpHouse.setName("0");
                house = tmpHouse;
            }
            // 添加house关联的dept
            house.setDeptId(dept.getDeptId());
            // 添加house关联的社区
            house.setCommunityId(SecurityUtils.getCommunityId());

            // 再添加house
            return houseMapper.insertSysHouse(house);
        } else {
            return deptMapper.insertDept(dept);
        }
    }

    /**
     *  批量新增地址树
     *  1. 插入栋 level = 2 （小区名称level = 1）
     *  2. 查询栋 => 每栋楼下插入单元 level = 3
     *  3. 查询单元 => 每单元下插入房间 level = 4
     *      a. 房间号是{楼成数}{房间编号} => 101(1层01房间)
     * @param batchDept
     * @return
     */
    @Override
    @Transactional
    public int insertBatchDept(SysBatchDept batchDept) {
        System.out.println(batchDept);
        Integer communityId = SecurityUtils.getCommunityId();
        String username = SecurityUtils.getUsername();
        // 创建栋 dept
        List<SysDept> buildDepts = createBuildDepts(batchDept.getRootDeptId(), batchDept.getBuildNum(),
                batchDept.getBuildStart(), communityId, username);
        // 插入栋 (插入后自动获取Id)
        deptMapper.batchInsert(buildDepts);
        // 构造 单元
        List<SysDept> unitDepts = createUnitDepts(buildDepts,batchDept.getUnitNum(),batchDept.getUnitStart());
        // 插入单元
        deptMapper.batchInsert(unitDepts);
        // 构造房间 dept
        List<SysDept> houseDepts = createHouseDepts(unitDepts, batchDept.getFloorNum(), batchDept.getFloorStart(),
                batchDept.getHouseNum(), batchDept.getHouseStart());
        // 插曲房间 dept
        deptMapper.batchInsert(houseDepts);
        // 构造 house
        List<SysHouse> houses = createHouses(houseDepts, batchDept.getHouseArea());
        // 插入房间 house
        return houseMapper.batchInsert(houses);
    }

    private List<SysHouse> createHouses(List<SysDept> houseDepts, Float houseArea) {
        List<SysHouse> houses = new ArrayList<>(houseDepts.size());
        for (SysDept dept : houseDepts) {
            SysHouse house = new SysHouse(dept.getDeptName(), 0, houseArea, dept.getDeptId(), dept.getCommunityId());
            houses.add(house);
        }
        return houses;
    }

    private List<SysDept> createHouseDepts(List<SysDept> unitDepts, Integer floorNum, Integer floorStart, Integer houseNum, Integer houseStart) {
        ArrayList<SysDept> depts = new ArrayList<>();
        // 房间最大位数,最少两位数
        int maxHouse = houseNum + houseStart - 1;
        int bit = Math.max(2, CommUtils.get10Bit(maxHouse));
        String format = "%0" + bit + "d";
        for (SysDept unitDept : unitDepts) {
            String ancestors = unitDept.getAncestors() + "," + unitDept.getDeptId();
            for (int i = floorStart; i < floorStart + floorNum; i++) {
                for (int j = houseStart; j < houseStart + houseNum; j++) {
                    String name = unitDept.getDeptName() + i + String.format(format, j);
                    SysDept dept = new SysDept(unitDept.getDeptId(), ancestors, name,
                            String.valueOf((i - 1) * maxHouse + j), "0",
                            unitDept.getLevel() + 1, unitDept.getCommunityId(), "3");
                    dept.setCreateBy(unitDept.getCreateBy());
                    depts.add(dept);
                }
            }
        }
        return depts;
    }

    private List<SysDept> createUnitDepts(List<SysDept> buildDepts, Integer unitNum, Integer unitStart) {
        ArrayList<SysDept> depts = new ArrayList<>();
        for (SysDept buildDept : buildDepts) {
            String ancestors = buildDept.getAncestors() + "," + buildDept.getDeptId();
            for (int i = unitStart; i < unitStart + unitNum; i++) {
                String name = buildDept.getDeptName() + i + Constants.UNIT_SUFFIX;
                SysDept dept = new SysDept(buildDept.getDeptId(), ancestors, name, String.valueOf(i), "0", buildDept.getLevel() + 1,
                        buildDept.getCommunityId(), "2");
                dept.setCreateBy(buildDept.getCreateBy());
                depts.add(dept);
            }
        }
        return depts;
    }

    private List<SysDept> createBuildDepts(Long rootDeptId, Integer buildNum, Integer buildStart,Integer communityId,
                                           String username) {
        ArrayList<SysDept> depts = new ArrayList<>(buildNum);
        String ancestors = "0," + rootDeptId;
        for (int i = buildStart; i < buildStart +buildNum; i++) {
            String name = i + Constants.BUILD_SUFFIX;
            SysDept dept = new SysDept(rootDeptId, ancestors, name, String.valueOf(i), "0", 2, communityId, "2");
            dept.setCreateBy(username);
            depts.add(dept);
        }
        return depts;
    }

    /**
     * 修改保存部门信息
     * 
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public int updateDept(SysDept dept)
    {
        SysDept newParentDept = deptMapper.selectDeptById(dept.getParentId());
        SysDept oldDept = deptMapper.selectDeptById(dept.getDeptId());
        if (StringUtils.isNotNull(newParentDept) && StringUtils.isNotNull(oldDept))
        {
            String newAncestors = newParentDept.getAncestors() + "," + newParentDept.getDeptId();
            String oldAncestors = oldDept.getAncestors();
            dept.setAncestors(newAncestors);
            updateDeptChildren(dept.getDeptId(), newAncestors, oldAncestors);
        }
        int result = deptMapper.updateDept(dept);
        if (UserConstants.DEPT_NORMAL.equals(dept.getStatus()))
        {
            // 如果该部门是启用状态，则启用该部门的所有上级部门
            updateParentDeptStatus(dept);
        }
        return result;
    }

    /**
     * 修改该部门的父级部门状态
     * 
     * @param dept 当前部门
     */
    private void updateParentDeptStatus(SysDept dept)
    {
        String updateBy = dept.getUpdateBy();
        dept = deptMapper.selectDeptById(dept.getDeptId());
        dept.setUpdateBy(updateBy);
        deptMapper.updateDeptStatus(dept);
    }

    /**
     * 修改子元素关系
     * 
     * @param deptId 被修改的部门ID
     * @param newAncestors 新的父ID集合
     * @param oldAncestors 旧的父ID集合
     */
    public void updateDeptChildren(Long deptId, String newAncestors, String oldAncestors)
    {
        List<SysDept> children = deptMapper.selectChildrenDeptById(deptId);
        for (SysDept child : children)
        {
            child.setAncestors(child.getAncestors().replaceFirst(oldAncestors, newAncestors));
        }
        if (children.size() > 0)
        {
            deptMapper.updateDeptChildren(children);
        }
    }

    /**
     * 删除部门管理信息
     * 
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public int deleteDeptById(Long deptId, String type)
    {
        // 若删除的是房间节点，则连同房间也删除
        if (UserConstants.DEPT_HOUSE.equals(type)) {
            return deptMapper.deleteDeptAndHouse(deptId);
        } else {
            return deptMapper.deleteDeptById(deptId);
        }
    }

    /**
     * 递归列表
     */
    private void recursionFn(List<SysDept> list, SysDept t)
    {
        // 得到子节点列表
        List<SysDept> childList = getChildList(list, t);
        t.setChildren(childList);
        for (SysDept tChild : childList)
        {
            if (hasChild(list, tChild))
            {
                recursionFn(list, tChild);
            }
        }
    }

    /**
     * 得到子节点列表
     */
    private List<SysDept> getChildList(List<SysDept> list, SysDept t)
    {
        List<SysDept> tlist = new ArrayList<SysDept>();
        Iterator<SysDept> it = list.iterator();
        while (it.hasNext())
        {
            SysDept n = (SysDept) it.next();
            if (StringUtils.isNotNull(n.getParentId()) && n.getParentId().longValue() == t.getDeptId().longValue())
            {
                tlist.add(n);
            }
        }
        return tlist;
    }

    /**
     * 判断是否有子节点
     */
    private boolean hasChild(List<SysDept> list, SysDept t)
    {
        return getChildList(list, t).size() > 0 ? true : false;
    }
}
